MacWorld 1998 September/Macworld (1998-09).dmg/Shareware World/Info/For Developers/Script Tools 1.3.6/Examples/Choose Several Files Example

Text File | 1993-06-17 | 418 b | 18 lines | [TEXT/ToyS]

property fileList : {}

set filesOK to true
try
    set fileList to ¬
        choose several files with prompt "Please select files to be archived:" ¬
            of type {"APPL", "TEXT", "PICT"} ¬
            starting with fileList
on error errText number errNum
    display dialog "Choose several files canceled (error: " & errText & ")" ¬
        buttons {"OK"} ¬
        default button {"OK"}
    set filesOK to false
end try

if filesOK then
    fileList
end if